10 REM FAST MODE BY STEVE CODY
20 FAST=828:SLOW=FAST+14
30 FOR X=FAST TO FAST+13:READA:POKEX,A:CK=CK+A:NEXT
40 IFCK<>1707THENPRINT"DATA ERROR!!":STOP
50 DATA 173,17,208,41,239,141,17,208,169,1,141,48,208,96
60 FORX=SLOW TO SLOW+13:READA:POKEX,A:CK=CK+A:NEXT
70 IFCK<>3158THENPRINT"DATA ERROR!!":STOP
80 DATA 169,0,141,48,208,173,17,208,9,16,141,17,208,96
90 PRINT"SYS"FAST"FOR FAST MODE"
100 PRINT"SYS" SLOW"FOR SLOW MODE":END